﻿Public Class Usuario

    Public nombre As String
    Public psw As String
    Public tipo As String
    Public id_usuario As String
    Public telefono As String
    Public direccion As String
    Public email As String


    Public Sub New()

    End Sub
    Public Sub New(ByVal id_usuario As String, ByVal nombre As String, ByVal psw As String, ByVal tipo As String, ByVal telefono As String, ByVal direccion As String, ByVal email As String)

        Me.nombre = nombre
        Me.psw = psw
        Me.tipo = tipo
        Me.id_usuario = id_usuario
        Me.telefono = telefono
        Me.direccion = direccion
        Me.email = email

    End Sub


    Public Function getNombre() As String
        Return Me.nombre
    End Function
    Public Function getPsw() As String
        Return Me.psw
    End Function
    Public Function getTipo() As String
        Return Me.tipo
    End Function
    Public Function getTelefono() As String
        Return Me.telefono
    End Function
    Public Function getDireccion() As String
        Return Me.direccion
    End Function
    Public Function getEmail() As String
        Return Me.email
    End Function
    Public Function getId_usuario() As String
        Return Me.id_usuario
    End Function
    Public Sub setNombre(ByVal nombre As String)
        Me.nombre = nombre
    End Sub
    Public Sub setPsw(ByVal psw As String)
        Me.psw = psw
    End Sub
    Public Sub setTipo(ByVal tipo As String)
        Me.tipo = tipo
    End Sub
    Public Sub setTelefono(ByVal nombre As String)
        Me.nombre = nombre
    End Sub
    Public Sub setDireccion(ByVal direccion As String)
        Me.direccion = direccion
    End Sub
    Public Sub setEmail(ByVal email As String)
        Me.email = email
    End Sub
    Public Sub setId_usuario(ByVal id_usuario As String)
        Me.id_usuario = id_usuario
    End Sub



End Class
